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I. 



The arqument is considered to have a sign and three binary 
integer positions, whereas the result is considered to have 
the binary point immediately to the right of the sign. The 
argument may vary from /2 pi radians to -2 pi radians, where- 
as the result varies from -.377777 (almost -1.0) to / .377777 
(almost /l.O). These subroutines use the "modified multiply' 1 
subroutine. 



II. 



III. 



Calling sequence: 

LIO 
JSP 



Subroutines: 



(the address of the angle expressed in radians) 
(the address of the first instruction of sine 
or cosine routines) 











ORG 






(fill in) 










OPD 






MULT IP 001662 ; 


COSINE 






DAP 






CSX 










LAC 






P02 










JMP 






COM 


SINE 








DAP 
CLA 






CSX 


COM 








DIO 
ADD 
SPA 






X 
X 


A2P 








ADD 
SUB 
SMA 
JMP 
ADD 






2P 
P02 

SEC 
P02 


POL 








RCR 
RCR 
JSP 
LOC 
DAC 
LIO 
JSP 
LOC 
DAC 
LIO 
JSP 
LOC 






S9 
S7 

MULT IP 

20P 

X 

X 

MULT IP 

X 

T 

C7 

MULT IP 

T 
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III.. Subroutines: (continued) 

ADD C5 

RCR S9 

RCR S9 

JSP MULT IP 

LOC T 

ADD C3 

RCR S9 

RCR S9 

JSP MULTIP 

LOC T 

ADD CI 

RCR S9 

RCR S9 

JSP MULTIP 

LOC X 

SCL S3 

DAC T 

XOR X 
SMA 

JMP OUT 

LAC ONE 

LIO X 
SPI 
CMA 

JHP CSX 

OUT LAG T 

CSX JUP 

SEC CMA 

ADD P02 

SMA 

JMP POL 

ADD P02 

SPA 

JMP FOR 

SUB P02 

JMP POL 

PGR SUB P02 

JMP A2P 

Cl 756103 

cj 121312 

C3 532511 

ci iWrt-3-7 

20P 2I4.2763 

2P 31101^0 

P02 062210 

ONE 377777 

X 

T 

END 



